0 REM THE TRANSACTOR VOLUME 6 ISSUE 02        LETTERS SECTION
100 REM SAVE"0:1541 ALIGN",8
105 REM WRITTEN BY: ED CLUTTER, TUCSON, ARIZONA
110 D=8: REM D = DEVICE NUMBER
115 OPEN 15,D,15: OPEN 2,D,2,"#"
120 PRINT#15,"M-W" CHR$(0) CHR$(0) CHR$(1) CHR$(192)
125 T=35: H$="-"
130 T$=STR$(T)
135 PRINT#15,"B-R 2 0" T "9"
140 GOSUB 170
145 PRINT#15,"B-R 2 0 1 9"
150 T$=STR$(1)
155 GOSUB 170
160 T=T-1: IF T>0 THEN 130
165 CLOSE2: CLOSE15: END
170 PRINT: PRINT "READING TRACK "H$;T$,
175 INPUT#15,A$,B$,C$,D$
180 PRINT A$;H$;B$;H$;C$;H$;D$
185 IF VAL(A$)<2 THEN RETURN
190 PRINT "DRIVE HAS FAILED ALIGNMENT CHECK"
195 GOTO 165